// XMLLib version 1
//
// Author
//
//   Thomas Koos (info@muetze1.de)
//   www.muetze1.de
//
// License
//
//   This Source Code Form is subject to the terms of the Mozilla Public
//   License, v. 1.1. If a copy of the MPL was not distributed with this
//   file, You can obtain one at http://mozilla.org/MPL/1.1/.
//
// Description
//
//   String adapter data unit containing entity translation table.
//
// Revision
//
//  $Id: StrAdapterEntity.pas 18 2014-04-21 21:28:10Z muetze1@gmail.com $
//

unit StrAdapterEntity;

interface

{$Z+}  // equal to $Z4 on newer compilers

type
  TEntityEntry = record
    Name: string;
    Unicode: Integer;
  end;

const
  coDefaultEntityTable: array[0..4] of TEntityEntry = (
    (Name: 'apos';    Unicode: 39),          // Apostroph needs to be the first entry!
    (Name: 'quot';    Unicode: 34),
    (Name: 'amp';     Unicode: 38),
    (Name: 'lt';      Unicode: 60),
    (Name: 'gt';      Unicode: 62) );

  coExtendedEntityTable: array[0..247] of TEntityEntry = (
    (Name: 'nbsp';    Unicode: 160),
    (Name: 'iexcl';   Unicode: 161),
    (Name: 'cent';    Unicode: 162),
    (Name: 'pound';   Unicode: 163),
    (Name: 'curren';  Unicode: 164),
    (Name: 'yen';     Unicode: 165),
    (Name: 'brvbar';  Unicode: 166),
    (Name: 'sect';    Unicode: 167),
    (Name: 'uml';     Unicode: 168),
    (Name: 'copy';    Unicode: 169),
    (Name: 'ordf';    Unicode: 170),
    (Name: 'laquo';   Unicode: 171),
    (Name: 'not';     Unicode: 172),
    (Name: 'shy';     Unicode: 173),
    (Name: 'reg';     Unicode: 174),
    (Name: 'macr';    Unicode: 175),
    (Name: 'deg';     Unicode: 176),
    (Name: 'plusmn';  Unicode: 177),
    (Name: 'sup2';    Unicode: 178),
    (Name: 'sup3';    Unicode: 179),
    (Name: 'acute';   Unicode: 180),
    (Name: 'micro';   Unicode: 181),
    (Name: 'para';    Unicode: 182),
    (Name: 'middot';  Unicode: 183),
    (Name: 'cedil';   Unicode: 184),
    (Name: 'sup1';    Unicode: 185),
    (Name: 'ordm';    Unicode: 186),
    (Name: 'raquo';   Unicode: 187),
    (Name: 'frac14';  Unicode: 188),
    (Name: 'frac12';  Unicode: 189),
    (Name: 'frac34';  Unicode: 190),
    (Name: 'iquest';  Unicode: 191),
    (Name: 'Agrave';  Unicode: 192),
    (Name: 'Aacute';  Unicode: 193),
    (Name: 'Acirc';   Unicode: 194),
    (Name: 'Atilde';  Unicode: 195),
    (Name: 'Auml';    Unicode: 196),
    (Name: 'Aring';   Unicode: 197),
    (Name: 'AElig';   Unicode: 198),
    (Name: 'Ccedil';  Unicode: 199),
    (Name: 'Egrave';  Unicode: 200),
    (Name: 'Eacute';  Unicode: 201),
    (Name: 'Ecirc';   Unicode: 202),
    (Name: 'Euml';    Unicode: 203),
    (Name: 'Igrave';  Unicode: 204),
    (Name: 'Iacute';  Unicode: 205),
    (Name: 'Icirc';   Unicode: 206),
    (Name: 'Iuml';    Unicode: 207),
    (Name: 'ETH';     Unicode: 208),
    (Name: 'Ntilde';  Unicode: 209),
    (Name: 'Ograve';  Unicode: 210),
    (Name: 'Oacute';  Unicode: 211),
    (Name: 'Ocirc';   Unicode: 212),
    (Name: 'Otilde';  Unicode: 213),
    (Name: 'Ouml';    Unicode: 214),
    (Name: 'times';   Unicode: 215),
    (Name: 'Oslash';  Unicode: 216),
    (Name: 'Ugrave';  Unicode: 217),
    (Name: 'Uacute';  Unicode: 218),
    (Name: 'Ucirc';   Unicode: 219),
    (Name: 'Uuml';    Unicode: 220),
    (Name: 'Yacute';  Unicode: 221),
    (Name: 'THORN';   Unicode: 222),
    (Name: 'szlig';   Unicode: 223),
    (Name: 'agrave';  Unicode: 224),
    (Name: 'aacute';  Unicode: 225),
    (Name: 'acirc';   Unicode: 226),
    (Name: 'atilde';  Unicode: 227),
    (Name: 'auml';    Unicode: 228),
    (Name: 'aring';   Unicode: 229),
    (Name: 'aelig';   Unicode: 230),
    (Name: 'ccedil';  Unicode: 231),
    (Name: 'egrave';  Unicode: 232),
    (Name: 'eacute';  Unicode: 233),
    (Name: 'ecirc';   Unicode: 234),
    (Name: 'euml';    Unicode: 235),
    (Name: 'igrave';  Unicode: 236),
    (Name: 'iacute';  Unicode: 237),
    (Name: 'icirc';   Unicode: 238),
    (Name: 'iuml';    Unicode: 239),
    (Name: 'eth';     Unicode: 240),
    (Name: 'ntilde';  Unicode: 241),
    (Name: 'ograve';  Unicode: 242),
    (Name: 'oacute';  Unicode: 243),
    (Name: 'ocirc';   Unicode: 244),
    (Name: 'otilde';  Unicode: 245),
    (Name: 'ouml';    Unicode: 246),
    (Name: 'divide';  Unicode: 247),
    (Name: 'oslash';  Unicode: 248),
    (Name: 'ugrave';  Unicode: 249),
    (Name: 'uacute';  Unicode: 250),
    (Name: 'ucirc';   Unicode: 251),
    (Name: 'uuml';    Unicode: 252),
    (Name: 'yacute';  Unicode: 253),
    (Name: 'thorn';   Unicode: 254),
    (Name: 'yuml';    Unicode: 255),
    (Name: 'OElig';   Unicode: 338),
    (Name: 'oelig';   Unicode: 339),
    (Name: 'Scaron';  Unicode: 352),
    (Name: 'scaron';  Unicode: 353),
    (Name: 'Yuml';    Unicode: 376),
    (Name: 'fnof';    Unicode: 402),
    (Name: 'circ';    Unicode: 710),
    (Name: 'tilde';   Unicode: 732),
    (Name: 'Alpha';   Unicode: 913),
    (Name: 'Beta';    Unicode: 914),
    (Name: 'Gamma';   Unicode: 915),
    (Name: 'Delta';   Unicode: 916),
    (Name: 'Epsilon'; Unicode: 917),
    (Name: 'Zeta';    Unicode: 918),
    (Name: 'Eta';     Unicode: 919),
    (Name: 'Theta';   Unicode: 920),
    (Name: 'Iota';    Unicode: 921),
    (Name: 'Kappa';   Unicode: 922),
    (Name: 'Lambda';  Unicode: 923),
    (Name: 'Mu';      Unicode: 924),
    (Name: 'Nu';      Unicode: 925),
    (Name: 'Xi';      Unicode: 926),
    (Name: 'Omicron'; Unicode: 927),
    (Name: 'Pi';      Unicode: 928),
    (Name: 'Rho';     Unicode: 929),
    (Name: 'Sigma';   Unicode: 931),
    (Name: 'Tau';     Unicode: 932),
    (Name: 'Upsilon'; Unicode: 933),
    (Name: 'Phi';     Unicode: 934),
    (Name: 'Chi';     Unicode: 935),
    (Name: 'Psi';     Unicode: 936),
    (Name: 'Omega';   Unicode: 937),
    (Name: 'alpha';   Unicode: 945),
    (Name: 'beta';    Unicode: 946),
    (Name: 'gamma';   Unicode: 947),
    (Name: 'delta';   Unicode: 948),
    (Name: 'epsilon'; Unicode: 949),
    (Name: 'zeta';    Unicode: 950),
    (Name: 'eta';     Unicode: 951),
    (Name: 'theta';   Unicode: 952),
    (Name: 'iota';    Unicode: 953),
    (Name: 'kappa';   Unicode: 954),
    (Name: 'lambda';  Unicode: 955),
    (Name: 'mu';      Unicode: 956),
    (Name: 'nu';      Unicode: 957),
    (Name: 'xi';      Unicode: 958),
    (Name: 'omicron'; Unicode: 959),
    (Name: 'pi';      Unicode: 960),
    (Name: 'rho';     Unicode: 961),
    (Name: 'sigmaf';  Unicode: 962),
    (Name: 'sigma';   Unicode: 963),
    (Name: 'tau';     Unicode: 964),
    (Name: 'upsilon'; Unicode: 965),
    (Name: 'phi';     Unicode: 966),
    (Name: 'chi';     Unicode: 967),
    (Name: 'psi';     Unicode: 968),
    (Name: 'omega';   Unicode: 969),
    (Name: 'thetasym'; Unicode: 977),
    (Name: 'upsih';   Unicode: 978),
    (Name: 'piv';     Unicode: 982),
    (Name: 'ensp';    Unicode: 8194),
    (Name: 'emsp';    Unicode: 8195),
    (Name: 'thinsp';  Unicode: 8201),
    (Name: 'zwnj';    Unicode: 8204),
    (Name: 'zwj';     Unicode: 8205),
    (Name: 'lrm';     Unicode: 8206),
    (Name: 'rlm';     Unicode: 8207),
    (Name: 'ndash';   Unicode: 8211),
    (Name: 'mdash';   Unicode: 8212),
    (Name: 'lsquo';   Unicode: 8216),
    (Name: 'rsquo';   Unicode: 8217),
    (Name: 'sbquo';   Unicode: 8218),
    (Name: 'ldquo';   Unicode: 8220),
    (Name: 'rdquo';   Unicode: 8221),
    (Name: 'bdquo';   Unicode: 8222),
    (Name: 'dagger';  Unicode: 8224),
    (Name: 'Dagger';  Unicode: 8225),
    (Name: 'bull';    Unicode: 8226),
    (Name: 'hellip';  Unicode: 8230),
    (Name: 'permil';  Unicode: 8240),
    (Name: 'prime';   Unicode: 8242),
    (Name: 'Prime';   Unicode: 8243),
    (Name: 'lsaquo';  Unicode: 8249),
    (Name: 'rsaquo';  Unicode: 8250),
    (Name: 'oline';   Unicode: 8254),
    (Name: 'frasl';   Unicode: 8260),
    (Name: 'euro';    Unicode: 8364),
    (Name: 'image';   Unicode: 8465),
    (Name: 'weierp';  Unicode: 8472),
    (Name: 'real';    Unicode: 8476),
    (Name: 'trade';   Unicode: 8482),
    (Name: 'alefsym';  Unicode: 8501),
    (Name: 'larr';    Unicode: 8592),
    (Name: 'uarr';    Unicode: 8593),
    (Name: 'rarr';    Unicode: 8594),
    (Name: 'darr';    Unicode: 8595),
    (Name: 'harr';    Unicode: 8596),
    (Name: 'crarr';   Unicode: 8629),
    (Name: 'lArr';    Unicode: 8656),
    (Name: 'uArr';    Unicode: 8657),
    (Name: 'rArr';    Unicode: 8658),
    (Name: 'dArr';    Unicode: 8659),
    (Name: 'hArr';    Unicode: 8660),
    (Name: 'forall';  Unicode: 8704),
    (Name: 'part';    Unicode: 8706),
    (Name: 'exist';   Unicode: 8707),
    (Name: 'empty';   Unicode: 8709),
    (Name: 'nabla';   Unicode: 8711),
    (Name: 'isin';    Unicode: 8712),
    (Name: 'notin';   Unicode: 8713),
    (Name: 'ni';      Unicode: 8715),
    (Name: 'prod';    Unicode: 8719),
    (Name: 'sum';     Unicode: 8721),
    (Name: 'minus';   Unicode: 8722),
    (Name: 'lowast';  Unicode: 8727),
    (Name: 'radic';   Unicode: 8730),
    (Name: 'prop';    Unicode: 8733),
    (Name: 'infin';   Unicode: 8734),
    (Name: 'ang';     Unicode: 8736),
    (Name: 'and';     Unicode: 8743),
    (Name: 'or';      Unicode: 8744),
    (Name: 'cap';     Unicode: 8745),
    (Name: 'cup';     Unicode: 8746),
    (Name: 'int';     Unicode: 8747),
    (Name: 'there4';  Unicode: 8756),
    (Name: 'sim';     Unicode: 8764),
    (Name: 'cong';    Unicode: 8773),
    (Name: 'asymp';   Unicode: 8776),
    (Name: 'ne';      Unicode: 8800),
    (Name: 'equiv';   Unicode: 8801),
    (Name: 'le';      Unicode: 8804),
    (Name: 'ge';      Unicode: 8805),
    (Name: 'sub';     Unicode: 8834),
    (Name: 'sup';     Unicode: 8835),
    (Name: 'nsub';    Unicode: 8836),
    (Name: 'sube';    Unicode: 8838),
    (Name: 'supe';    Unicode: 8839),
    (Name: 'oplus';   Unicode: 8853),
    (Name: 'otimes';  Unicode: 8855),
    (Name: 'perp';    Unicode: 8869),
    (Name: 'sdot';    Unicode: 8901),
    (Name: 'lceil';   Unicode: 8968),
    (Name: 'rceil';   Unicode: 8969),
    (Name: 'lfloor';  Unicode: 8970),
    (Name: 'rfloor';  Unicode: 8971),
    (Name: 'lang';    Unicode: 9001),
    (Name: 'rang';    Unicode: 9002),
    (Name: 'loz';     Unicode: 9674),
    (Name: 'spades';  Unicode: 9824),
    (Name: 'clubs';   Unicode: 9827),
    (Name: 'hearts';  Unicode: 9829),
    (Name: 'diams';   Unicode: 9830)
  );

implementation

end.


